home *** CD-ROM | disk | FTP | other *** search
- property spriteNum
- global gCurrentSection
-
- on mouseUp
- itemNumber = spriteNum - 50
- CurrentPath = "Interface\" & gCurrentSection & "\" & itemNumber & "\"
- member("Imaginary").text = EMPTY
- member("Imaginary").fileName = CurrentPath & "description.txt"
- if member("Imaginary").text = EMPTY then
- else
- HowFarDown = 116 + (20 * (spriteNum - 51))
- set the locV of sprite 50 to 116 + (20 * (spriteNum - 51))
- set the locH of sprite 50 to 160
- end if
- end
-